Apple Reference & Presen…tion Library 4 (Reseller)/Apple Ref. & Pres. Lib.v4.0.iso/4-Demos/Apple Demos/Tutorials/Display Card 4•8⁄8•24 Training/Display Card 4•8_8•24 Training/background_35139.txt

Text File | 1990-03-19 | 5.3 KB | 273 lines

-- background: 35139 from stack: in
-- bmap block id: 7948
-- flags: 0000
-- background id: 0
-- name: IndexBack
----- HyperTalk script -----
on closeBackground
  global mapLoc
  put 11 into mapLoc
  put "yes" into line 12 of field "footprints" of card "Map"
end closeBackground



-- part 2 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=128 top=0 right=53 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 21
-- text size: 18
-- style flags: 10240
-- line height: 20
-- part name: Title


-- part 3 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=128 top=24 right=66 bottom=511
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 21
-- text size: 18
-- style flags: 0
-- line height: 20
-- part name: cardTitle


-- part 4 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=128 top=51 right=87 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 157
-- text size: 14
-- style flags: 0
-- line height: 16
-- part name:


-- part 8 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=428 top=317 right=342 bottom=456
-- title width / last selected line: 0
-- icon id / first selected line: 18611 / 18611
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: prev
----- HyperTalk script -----
on mouseUp
  visual effect scroll right
  go prev
end mouseUp



-- part 9 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=457 top=317 right=342 bottom=485
-- title width / last selected line: 0
-- icon id / first selected line: 18612 / 18612
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: next
----- HyperTalk script -----
on mouseUp
  visual scroll left
  go next
end mouseUp



-- part 11 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=128 top=94 right=320 bottom=510
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 156
-- text size: 14
-- style flags: 0
-- line height: 16
-- part name: cardText


-- part 12 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=14 top=86 right=107 bottom=55
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 157
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name: A - C
----- HyperTalk script -----
on mouseUp
  if the name of this card is "index 1" then
    set the hilite of me to true
  else
    visual effect dissolve
    go card "index 1"
  end if
end mouseUp



-- part 14 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=14 top=110 right=132 bottom=55
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 157
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name: D - F
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go card "index 3"
end mouseUp



-- part 15 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=14 top=134 right=156 bottom=55
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 157
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name: G - L
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go card "index 4"
end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=14 top=158 right=180 bottom=55
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 157
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name: M - Q
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go card "index 6"
end mouseUp



-- part 17 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=14 top=182 right=204 bottom=55
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 157
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name: R - T
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go card "index 8"
end mouseUp



-- part 18 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=13 top=206 right=228 bottom=55
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 157
-- text size: 14
-- style flags: 0
-- line height: 18
-- part name: U - Z
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go card "index 10"
end mouseUp



-- part 24 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=448 top=0 right=19 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 10
-- style flags: 2048
-- line height: 13
-- part name: Contents
----- HyperTalk script -----
on mouseUp
  visual effect dissolve
  go card "content 0"
end mouseUp



-- part 25 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=484 top=317 right=342 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 18613 / 18613
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: return
----- HyperTalk script -----
on mouseUp
  visual dissolve
  go card "Map"
end mouseUp